home *** CD-ROM | disk | FTP | other *** search
/ Chip: 2005 Utilities / CHIP Utilities 2005.7z / CHIP Utilities 2005.iso / images / arachne.igz / arachne.img / LEVEL1 / CDROM.CAB / bin / cdrom.bat
DOS Batch File  |  2005-01-16  |  14KB  |  445 lines
  1. @if "%debug%"=="" echo off
  2. if "%1"==":" if not "%2"=="" goto %2
  3.  
  4. echo CDROM: Starting (version 2.2)
  5.  
  6. :_start
  7. echo. > %tmp%\_cdrom.tmp
  8. if not exist %ramdrv%\etc\global.set goto _noglob
  9. type %ramdrv%\etc\global.set > %tmp%\_cdrom.tmp
  10. :_noglob
  11. if not exist %ramdrv%\etc\cdrom.set goto _nospec
  12. type %ramdrv%\etc\cdrom.set > %tmp%\_cdrom.tmp
  13. :_nospec
  14. xgrep -sy "^[:s]*@*[:s]*s?e?t?[:s]*CDROM_.+=" %tmp%\_cdrom.tmp > %tmp%\_cdrom.bak
  15. if errorlevel 1 goto _noset
  16. xgrep -sy "^[:s]*@*[:s]*set[:s]+" %tmp%\_cdrom.bak > %tmp%\_cdrom.bat
  17. xgrep -syv "^[:s]*@*[:s]*set[:s]+" %tmp%\_cdrom.bak > %tmp%\_cdrom.tmp
  18. if errorlevel 1 goto _runset
  19. lmod /L* set []< %tmp%\_cdrom.tmp >> %tmp%\_cdrom.bat
  20. :_runset
  21. call %tmp%\_cdrom.bat
  22. :_noset
  23.  
  24. if "%cdrom_ti%"=="" set cdrom_ti=10
  25.  
  26. if "%1"=="-c" goto _config
  27. if "%1"=="/c" goto _config
  28. if "%1"=="-h" goto _usage
  29. if "%1"=="/h" goto _usage
  30.  
  31. if not "nwcache.exe"=="%cache%" goto _okq
  32. echo.
  33. echo CDROM: loading driver aborted
  34. echo.
  35. echo CD-ROM driver should be loaded before cache nwcache.exe.
  36. echo Nwcache.exe is already loaded. To prevent this next time,
  37. echo please move nwcache.%arcext% to dir \level2\.
  38. echo.
  39. @pause
  40. goto _end
  41. :_okq
  42. if "%cdrom_ncfg%"=="1" goto _nocfg
  43. set wcb1=%cdrom_install%
  44. call w.bat box @%ramdrv%\bin\cdrom.bat:w_cfg #2,%cdrom_ti%
  45. if errorlevel 3 goto _end
  46. set cdrom_install=%wcb1%
  47. if errorlevel 2 goto _config
  48. :_nocfg
  49.  
  50. if "%cdrom_install%"=="1" goto _dothecd
  51. echo CDROM: Skipping CDROM
  52. goto _end
  53. :_dothecd
  54. if exist CDEXUSB1 goto _notagain
  55. if exist CDEXELT1 goto _notagain
  56. if exist CDEXATA1 goto _notagain
  57. if exist CDEXSCS1 goto _notagain
  58.  
  59. if "%cdrom_ld%"=="5" goto _fixed
  60. if "%cdrom_ld%"=="4" goto _manual
  61. goto _auto
  62.  
  63. :_manual
  64. echo CDROM: Manual loading mode
  65. echo :w_manual "Manual CD-Rom configuration?" [x]>%tmp%\_cdrom.tmp
  66. echo.>>%tmp%\_cdrom.tmp
  67. :_dmy12
  68. echo [!] Install CDROM >>%tmp%\_cdrom.tmp
  69. echo.>>%tmp%\_cdrom.tmp
  70. echo Use [$ cdrom_drv,1,U]: as the first drive letter for CD-Rom>>%tmp%\_cdrom.tmp
  71. echo.>>%tmp%\_cdrom.tmp
  72. echo     [!] Eltorito - requires %srcdrv%\lib\eltorito.%arcext%>>%tmp%\_cdrom.tmp
  73. echo     [!] Atapi    - requires %srcdrv%\lib\atapi.%arcext%>>%tmp%\_cdrom.tmp
  74. echo     [!] USB      - requires aspiusb.%arcext%>>%tmp%\_cdrom.tmp
  75. echo     [!] Scsi     - requires %srcdrv%\lib\aspi.%arcext% (and more)>>%tmp%\_cdrom.tmp
  76. echo.>>%tmp%\_cdrom.tmp
  77. echo                  [ Ok ]  [? Cancel ]>>%tmp%\_cdrom.tmp
  78. set wcb1=%cdrom_elt%
  79. set wcb2=%cdrom_ata%
  80. set wcb3=%cdrom_scs%
  81. set wcb4=%cdrom_usb%
  82. call w.bat box @%tmp%\_cdrom.tmp:w_manual
  83. set cdrom_elt=%wcb1%
  84. set cdrom_ata=%wcb2%
  85. set cdrom_usb=%wcb4%
  86. set cdrom_scs=%wcb3%
  87. if errorlevel 2 goto _end
  88.  
  89. :_fixed
  90. echo CDROM: Fixed loading mode
  91. if not "%cdrom_elt%"=="1" goto _goatapi
  92. echo CDROM: Loading El-Torito
  93. if not exist %srcdrv%\lib\eltorito.%arcext% %0 : _error missing %srcdrv%\lib\eltorito.%arcext%
  94. if exist %ramdrv%\lib\eltorito.sys goto _torito2
  95. call %ramdrv%\bin\unpack.bat %srcdrv%\lib\eltorito.%arcext%
  96. if not "%unpackerr%"=="" goto _abort
  97. :_torito2
  98. call devhigh %ramdrv%\lib\eltorito.sys /D:CDEXELT1
  99.  
  100. :_goatapi
  101. if not "%cdrom_ata%"=="1" goto _gousb
  102. echo CDROM: Loading Atapi
  103. if not exist %srcdrv%\lib\atapicd.%arcext% %0 : _error missing %srcdrv%\lib\atapicd.%arcext%
  104. if exist %ramdrv%\lib\vide-cdd.sys goto _fata2
  105. call %ramdrv%\bin\unpack.bat %srcdrv%\lib\atapicd.%arcext%
  106. if not "%unpackerr%"=="" goto _abort
  107. :_fata2
  108. call devhigh %ramdrv%\lib\vide-cdd.sys /D:CDEXATA1
  109.  
  110. :_gousb
  111. if not "%cdrom_usb%"=="1" goto _goscsi
  112. echo CDROM: Loading USB
  113. if not exist %ramdrv%\bin\usbcd.sys %0 : _error missing %ramdrv%\bin\usbcd.sys
  114. if not exist SCSIMGR$ %0 : _error USB ASPI not loaded
  115. call devhigh %ramdrv%\bin\usbcd.sys /D:CDEXUSB1
  116. :_goscsi
  117. if not "%cdrom_scs%"=="1" goto _noscsi2
  118. echo CDROM: Loading ASPI/SCSI
  119. if not exist %srcdrv%\lib\aspi.%arcext% %0 : _error missing %srcdrv%\lib\aspi.%arcext%
  120. if not exist %srcdrv%\lib\aspicd.%arcext% %0 : _error missing %srcdrv%\lib\aspicd.%arcext%
  121. if not exist %srcdrv%\lib\aspi\*.%arcext% %0 : _error missing %srcdrv%\lib\aspi\*.%arcext%
  122. if exist %ramdrv%\bin\aspi.bat goto _aspi2
  123. call %ramdrv%\bin\unpack.bat %srcdrv%\lib\aspi.%arcext%
  124. if not "%unpackerr%"=="" goto _abort
  125. :_aspi2
  126. call aspi.bat
  127. if "%pci0%"=="_BACK_" goto _noscsi2
  128. if not exist SCSIMGR$ goto _cdex
  129. if exist %ramdrv%\lib\aspicd.sys goto _scsi2
  130. call %ramdrv%\bin\unpack.bat %srcdrv%\lib\aspicd.%arcext%
  131. if not "%unpackerr%"=="" goto _abort
  132. :_scsi2
  133. call devhigh %ramdrv%\lib\aspicd.sys /D:CDEXSCS1
  134. :_noscsi2
  135. goto _cdex
  136.  
  137. :_auto
  138. echo CDROM: Auto mode
  139. if "%cdrom_ld%"=="3" goto _tryatapi
  140. echo CDROM: Trying El-Torito...
  141. if not exist %srcdrv%\lib\eltorito.%arcext% goto _tryatapi
  142. if not exist %ramdrv%\bin\ifmemdsk.com goto _ettool
  143. %ramdrv%\bin\ifmemdsk.com >%tmp%\nul
  144. if errorlevel 3 goto _eltorito
  145. if errorlevel 2 goto _eltorito
  146. if errorlevel 1 goto _eltorito
  147. :_ettool
  148. if not exist %ramdrv%\bin\ettool.com goto _tryatapi
  149. echo CDROM: Checking boot media type
  150. %ramdrv%\bin\ettool b
  151. if errorlevel 11 goto _tryatapi
  152. if errorlevel 10 goto _eltorito
  153. goto _tryatapi
  154.  
  155. :_eltorito
  156. if not exist %srcdrv%\lib\eltorito.%arcext% goto _noeltor
  157. echo CDROM: Loading El-Torito
  158. call %ramdrv%\bin\unpack.bat %srcdrv%\lib\eltorito.%arcext%
  159. if not "%unpackerr%"=="" goto _abort
  160. :_torito
  161. call devhigh %ramdrv%\lib\eltorito.sys /D:CDEXELT1
  162. if "%cdrom_ld%"=="2" goto _tryatapi
  163. if errorlevel 1 goto _abort
  164. goto _cdex
  165. :_noeltor
  166. echo CDROM: File %srcdrv%\lib\eltorito.%arcext% not found.
  167.  
  168. :_tryatapi
  169. echo CDROM: Trying Atapi...
  170. if not exist %srcdrv%\lib\atapicd.%arcext% goto _tryusb
  171. if exist %ramdrv%\lib\vide-cdd.sys goto _atapi1
  172. call %ramdrv%\bin\unpack.bat %srcdrv%\lib\atapicd.%arcext%
  173. if not "%unpackerr%"=="" goto _abort
  174. :_atapi1
  175. call devhigh %ramdrv%\lib\vide-cdd.sys /D:CDEXATA1
  176. if "%cdrom_ld%"=="2" goto _tryusb
  177. if "%cdrom_ld%"=="3" goto _tryusb
  178. if errorlevel 1 goto _tryusb
  179. goto _cdex
  180. :_noatapi
  181. echo CDROM: File %srcdrv%\lib\atapicd.%arcext% not found.
  182.  
  183. :_tryusb
  184. echo CDROM: Trying USB...
  185. if not exist %ramdrv%\bin\usbcd.sys goto _tryscsi
  186. if not exist SCSIMGR$ goto _tryscsi
  187. call devhigh %ramdrv%\bin\usbcd.sys /D:CDEXUSB1
  188. if "%cdrom_ld%"=="2" goto _tryscsi
  189. if "%cdrom_ld%"=="3" goto _tryscsi
  190. if errorlevel 1 goto _tryscsi
  191. goto _cdex
  192. :_tryscsi
  193. echo CDROM: Trying ASPI/SCSI...
  194. if not exist %srcdrv%\lib\aspi.%arcext% goto _cdex
  195. if exist %ramdrv%\bin\aspi.bat goto _aspi1
  196. call %ramdrv%\bin\unpack.bat %srcdrv%\lib\aspi.%arcext%
  197. if not "%unpackerr%"=="" goto _abort
  198. :_aspi1
  199. call aspi.bat
  200. if "%pci0%"=="_BACK_" goto _cdex
  201. if not exist SCSIMGR$ goto _cdex
  202. if not exist %srcdrv%\lib\aspicd.%arcext% goto _noaspicd
  203. call %ramdrv%\bin\unpack.bat %srcdrv%\lib\aspicd.%arcext%
  204. if not "%unpackerr%"=="" goto _abort
  205. call devhigh %ramdrv%\lib\aspicd.sys /D:CDEXSCS1
  206.  
  207. :_cdex
  208. if exist CDEXUSB1 goto _cdex1
  209. if exist CDEXELT1 goto _cdex1
  210. if exist CDEXATA1 goto _cdex1
  211. if exist CDEXSCS1 goto _cdex1
  212. echo CDROM: No CD-Rom drivers have been loaded!
  213. goto _abort
  214. :_cdex1
  215. set w_dev=
  216. if exist CDEXELT1 set w_dev=%w_dev% /D:CDEXELT1
  217. if exist CDEXATA1 set w_dev=%w_dev% /D:CDEXATA1
  218. if exist CDEXSCS1 set w_dev=%w_dev% /D:CDEXSCS1
  219. if exist CDEXUSB1 set w_dev=%w_dev% /D:CDEXUSB1
  220. if exist %ramdrv%\bin\nwcdex.exe goto _nwex1
  221. if exist %ramdrv%\bin\mscdex.exe goto _msex1
  222. if exist %ramdrv%\bin\shsucdx.* goto _shex1
  223. if exist %srcdrv%\lib\nwcdex.%arcext% goto _nwex
  224. if exist %srcdrv%\lib\mscdex.%arcext% goto _msex
  225. if exist %srcdrv%\lib\shsucdx.%arcext% goto _shex
  226. echo CDROM: Could not find %srcdrv%\lib\shsucdx.%arcext% or %srcdrv%\lib\mscdex.%arcext%
  227. goto _abort
  228. :_shex
  229. if exist %ramdrv%\bin\shsucdx.* goto _shex1
  230. call %ramdrv%\bin\unpack.bat %srcdrv%\lib\shsucdx.%arcext%
  231. if not "%unpackerr%"=="" goto _abort
  232. :_shex1
  233. :_shex1a
  234. set w_dev=
  235. if "%cachecd%"=="" set cachecd=1024
  236. if not exist CDEXELT1 goto _shex1elt
  237. if not "%cachecd%"=="0" if exist %ramdrv%\bin\cdrcache.sys call devhigh %ramdrv%\bin\cdrcache.sys CDEXELT1 CD$$ELT1 %cachecd%
  238. if exist CD$$ELT1 set w_dev=%w_dev% /D:CD$$ELT1
  239. if not exist CD$$ELT1 set w_dev=%w_dev% /D:CDEXELT1
  240. if not "%cdrom_drv%"=="" set w_dev=%w_dev%,%cdrom_drv%
  241. :_shex1elt
  242. if not exist CDEXATA1 goto _shex1ata
  243. if not "%cachecd%"=="0" if exist %ramdrv%\bin\cdrcache.sys call devhigh %ramdrv%\bin\cdrcache.sys CDEXATA1 CD$$ATA1 %cachecd%
  244. if exist CD$$ATA1 set w_dev=%w_dev% /D:CD$$ATA1
  245. if not exist CD$$ATA1 set w_dev=%w_dev% /D:CDEXATA1
  246. if not "%cdrom_drv%"=="" set w_dev=%w_dev%,%cdrom_drv%
  247. :_shex1ata
  248. if not exist CDEXSCS1 goto _shex1scs
  249. if not "%cachecd%"=="0" if exist %ramdrv%\bin\cdrcache.sys call devhigh %ramdrv%\bin\cdrcache.sys CDEXSCS1 CD$$SCS1 %cachecd%
  250. if exist CD$$SCS1 set w_dev=%w_dev% /D:CD$$SCS1
  251. if not exist CD$$SCS1 set w_dev=%w_dev% /D:CDEXSCS1
  252. if not "%cdrom_drv%"=="" set w_dev=%w_dev%,%cdrom_drv%
  253. :_shex1scs
  254. if not exist CDEXUSB1 goto _shex1usb
  255. if not "%cachecd%"=="0" if exist %ramdrv%\bin\cdrcache.sys call devhigh %ramdrv%\bin\cdrcache.sys CDEXUSB1 CD$$USB1 %cachecd%
  256. if exist CD$$USB1 set w_dev=%w_dev% /D:CD$$USB1
  257. if not exist CD$$USB1 set w_dev=%w_dev% /D:CDEXUSB1
  258. if not "%cdrom_drv%"=="" set w_dev=%w_dev%,%cdrom_drv%
  259. :_shex1usb
  260. :_shex1z
  261. shsucdx%w_dev%
  262. if errorlevel 33 goto _abort
  263. if errorlevel 1 if exist %ramdrv%\bin\shsucdx.exe goto _abort
  264. set w_dev=
  265. goto _autorun
  266. :_nwex
  267. call %ramdrv%\bin\unpack.bat %srcdrv%\lib\nwcdex.%arcext%
  268. if not "%unpackerr%"=="" goto _abort
  269. :_nwex1
  270. if not "%cdrom_drv%"=="" set w_dev=%w_dev% /L:%cdrom_drv%
  271. %ldh% nwcdex%w_dev%
  272. if errorlevel 1 goto _abort
  273. set w_dev=
  274. goto _autorun
  275. :_msex
  276. call %ramdrv%\bin\unpack.bat %srcdrv%\lib\mscdex.%arcext%
  277. if not "%unpackerr%"=="" goto _abort
  278. :_msex1
  279. if not "%cdrom_drv%"=="" set w_dev=%w_dev% /L:%cdrom_drv%
  280. %ldh% mscdex%w_dev%
  281. if errorlevel 1 goto _abort
  282. set w_dev=
  283. :_autorun
  284. set cd1=%cdrom_drv%:
  285. if "%cd1%"==":" set cd1=
  286. set | tfind /f1,2 "W_" >>%tmp%\_cdrom.tmp
  287. set | tfind /f1,6 "CDROM_" >>%tmp%\_cdrom.tmp
  288. type %tmp%\_cdrom.tmp | lmod /L* /B= set [$1]=>%tmp%\_cdrom.bat
  289. call %tmp%\_cdrom.bat
  290. if exist %tmp%\_cdrom.* del %tmp%\_cdrom.*
  291. set wcb1=
  292. set wcb2=
  293. set wcb3=
  294. set wcb4=
  295. set wcb5=
  296. set wcb6=
  297. set wcb7=
  298. set wcb8=
  299. set wcb9=
  300. set wrb=
  301. set wbat=
  302. set ?=
  303. if exist %ramdrv%\bin\cdautrun.bat goto _goautrun
  304. if not exist %srcdrv%\lib\cdautrun.%arcext% goto _nocdautrun
  305. call %ramdrv%\bin\unpack.bat %srcdrv%\lib\cdautrun.%arcext%
  306. if not "%unpackerr%"=="" goto _abort
  307. :_goautrun
  308. %ramdrv%\bin\cdautrun.bat
  309. echo CDROM: Eh, did "%ramdrv%\bin\cdautrun.bat" failed?!?
  310. goto _abort
  311. :_nocdautrun
  312. echo CDROM: File "%srcdrv%\lib\cdautrun.%arcext%" not found... autorun disabled.
  313. goto _end
  314.  
  315. :_config
  316. echo :w_config "CD-Rom configuration" [x]>%tmp%\_cdrom.tmp
  317. echo.>>%tmp%\_cdrom.tmp
  318. echo Dialog timeout [$ cdrom_ti,3] seconds.>>%tmp%\_cdrom.tmp
  319. echo [!] Skip "Run CD or go config?" dialog>>%tmp%\_cdrom.tmp
  320. echo.>>%tmp%\_cdrom.tmp
  321. :_dmy12
  322. echo [!] Install CDROM >>%tmp%\_cdrom.tmp
  323. echo.>>%tmp%\_cdrom.tmp
  324. echo Use [$ cdrom_drv,1,U]: as the first drive letter for CD-Rom>>%tmp%\_cdrom.tmp
  325. echo.>>%tmp%\_cdrom.tmp
  326. echo Driver loading mode:>>%tmp%\_cdrom.tmp
  327. echo [.] Auto, try to detect best>>%tmp%\_cdrom.tmp
  328. echo [.] Auto, try to detect all>>%tmp%\_cdrom.tmp
  329. echo [.] Auto, try to detect all except Eltorito>>%tmp%\_cdrom.tmp
  330. echo [.] Manual, always ask user>>%tmp%\_cdrom.tmp
  331. echo [.] Fixed, always load:>>%tmp%\_cdrom.tmp
  332. echo     [!] Eltorito - requires %srcdrv%\lib\eltorito.%arcext%>>%tmp%\_cdrom.tmp
  333. echo     [!] Atapi    - requires %srcdrv%\lib\atapi.%arcext%>>%tmp%\_cdrom.tmp
  334. echo     [!] USB      - requires aspiusb.%arcext%>>%tmp%\_cdrom.tmp
  335. echo     [!] Scsi     - requires %srcdrv%\lib\aspi.%arcext% (and more)>>%tmp%\_cdrom.tmp
  336. echo.>>%tmp%\_cdrom.tmp
  337. echo              [ Save ]  [? Cancel ]>>%tmp%\_cdrom.tmp
  338. set wrb=%cdrom_ld%
  339. set wcb1=%cdrom_ncfg%
  340. set wcb2=%cdrom_install%
  341. set wcb3=%cdrom_elt%
  342. set wcb4=%cdrom_ata%
  343. set wcb5=%cdrom_scs%
  344. set wcb6=%cdrom_usb%
  345. call w.bat box @%tmp%\_cdrom.tmp:w_config
  346. set cdrom_ld=%wrb%
  347. set cdrom_ncfg=%wcb1%
  348. set cdrom_install=%wcb2%
  349. set cdrom_elt=%wcb3%
  350. set cdrom_ata=%wcb4%
  351. set cdrom_usb=%wcb6%
  352. set cdrom_scs=%wcb5%
  353. if errorlevel 2 goto _end
  354. set t_out=1
  355. call drd.bat %srcdrv%
  356. if errorlevel 1 set t_out=0
  357. call w.bat box @%ramdrv%\bin\cdrom.bat:w_wprot #1,%t_out%
  358. set t_out=
  359. if errorlevel 2 goto _start
  360.  
  361. echo CDROM: Saving configuration...
  362. :_dumsave
  363. set | tfind /f1,6 "CDROM_"> %tmp%\_cdrom.bat
  364. if not exist %srcdrv%\etc\*.* mkdir %srcdrv%\etc
  365. if not exist %ramdrv%\etc\global.set goto _yglob
  366. xgrep -syv "^[:s]*@*[:s]*s?e?t?[:s]*CDROM_.+=" %ramdrv%\etc\global.set >> %tmp%\_cdrom.bat
  367. :_yglob
  368. type %tmp%\_cdrom.bat > %srcdrv%\etc\global.set
  369. type %tmp%\_cdrom.bat > %ramdrv%\etc\global.set
  370. if exist %srcdrv%\etc\cdrom.set del %srcdrv%\etc\cdrom.set > %tmp%\nul
  371. if exist %ramdrv%\etc\cdrom.set del %ramdrv%\etc\cdrom.set > %tmp%\nul
  372. echo CDROM: Configuration saved to %srcdrv%\etc\cdrom.set
  373. echo.
  374. @rem pause
  375. if exist CDEXUSB1 goto _end
  376. if exist CDEXELT1 goto _end
  377. if exist CDEXATA1 goto _end
  378. if exist CDEXSCS1 goto _end
  379. goto _start
  380. :_notagain
  381. echo CDROM: Drivers are already loaded...
  382. goto _autorun
  383. :_noaspi
  384. echo CDROM: No ASPI driver loaded
  385. goto _abort
  386. :_nodrv
  387. echo CDROM: No drivers found. Add Atapi and/or SCSI CD-Rom drivers...
  388. goto _abort
  389. :_noaspicd
  390. echo CDROM: File not found: %srcdrv%\lib\aspicd.%arcext%
  391. goto _abort
  392. :w_cfg "Run CD or go config?" [x]
  393.         (~press any key~: #? sec.)
  394.  
  395.   [!] Running CD-Rom...
  396.  
  397.   [ Ok ] [ Config ] [? Abort ]
  398. ::
  399. :w_wprot "Disable write protection..." [x]
  400.  
  401.   If the disk in drive %srcdrv% is write
  402.   protected, please disable the write
  403.   protection now in order to save settings.
  404.   You can re-enable write protection after
  405.   saving.
  406.  
  407.             [ Ok ]  [? Cancel ]
  408. ::
  409. :_usage
  410. echo Parameters:
  411. echo -c    Config mode
  412. echo -h    This help info
  413. echo.
  414. echo _end
  415. :_error
  416. shift
  417. shift
  418. echo.
  419. echo CDROM: Error %1 %2 %3 %4 %5 %6 %7 %8
  420. echo.
  421. @rem pause
  422. goto _end
  423. :_abort
  424. echo CDROM: Aborted...
  425. echo.
  426. @rem pause
  427. :_end
  428. set | tfind /f1,2 "W_" >>%tmp%\_cdrom.tmp
  429. set | tfind /f1,6 "CDROM_" >>%tmp%\_cdrom.tmp
  430. type %tmp%\_cdrom.tmp | lmod /L* /B= set [$1]=>%tmp%\_cdrom.bat
  431. call %tmp%\_cdrom.bat
  432. if exist %tmp%\_cdrom.* del %tmp%\_cdrom.*
  433. set ?=
  434. set wcb1=
  435. set wcb2=
  436. set wcb3=
  437. set wcb4=
  438. set wcb5=
  439. set wcb6=
  440. set wcb7=
  441. set wcb8=
  442. set wcb9=
  443. set wrb=
  444. set wbat=
  445.